home *** CD-ROM | disk | FTP | other *** search
/ Aminet 22 / Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso / Aminet / comm / news / Unbatch.lha / UnBatch < prev    next >
Text File  |  1997-09-04  |  415b  |  17 lines
  1. if exists uuspool:NABatch
  2.         echo "unbatching news ..."
  3.         failat 30
  4.         getpriority >nil:                                                       ;back to default
  5.         changetaskpri -1
  6.         dannews uuspool:NABatch delete -h
  7.         failat 10
  8.         get >nil: Priority
  9.  
  10.         if not WARN
  11.                 changetaskpri $Priority
  12.         endif
  13. else
  14.         echo "Sorry, no news unbatched"
  15. endif
  16.  
  17.